C:\to_server\website\mrdcl-learning.com\mrdcl_files\TAB-104\run.stp
start data,
serial number in columns 1-3,
card characters 100,
ds $q1=$4/1-9,0,e,
x='Brand A;
Brand B;
Brand C;
Brand D;
Brand E;
Brand F;
Brand G;
Brand H;
Brand I;
Brand J;
None',
xt='Q1 Favourite brand',
dm $q2=$5-14,e,
x=$q1,
xt='Q2 Other brands considered',
dm $q1q2=$q1.or.$q2,
dm $q1q2=$q1q2/1-10,e,
x=$q1,
xt='Q1/Q2 All brands considered',
dm $q3=$15-24,e,
x=$q1,
xt='Q3 Brand seen advertised',
dm $q1q2_and_q3=$q1q2.and.$q3,
dm $q1q2_and_q3=$q1q2_and_q3/1-10,e,
x=$q1,
xt='Q1/Q3 Brand connsidered and seen advertised',
dm $q1q2_not_q3=$q1q2.and..not.$q3,
dm $q1q2_not_q3=$q1q2_not_q3/1-10,e,
x=$q1,
xt='Q1/Q3 Brand connsidered and not seen advertised',
ds $gender=$25/1,2,
x='Male;
Female',
xt='Gender',
ds $age=$26/1-3,
x='16-34;
35-54;
55+',
xt='Age',
di $number_in_household=$27-28,
xt='Number in household',
ds $vnumber_in_household=$number_in_household/1,2,3..5,>5,e,
x='1;
2;
3 to 5;
More than 5;
Not stated<z>',
xt='Number in household',
dm $mybanner=$gender,$age/1,2..3,$number_in_household/1..2,>2,
h='Gender\
Male;
Female;
Age\
16-34;
35+;
Number in h/hold\
1-2;
3+',
finish data,
start tables,
global bt#='All respondents',
f=dpr1/clw7,
%jh='Brand Awareness Project<jc>',
%jf='Produced by MRDC Software on <&dd>/<&mm>/<&yy> at <&hh>:<&nn>:<&ss><jc>',
%avg='Mean score<d2>',
select banner $mybanner,
t#1(f=brs/dpr0)=$q1 * ,
t#2(f=dpr0)=$q1 * $q2,
t#3=$q2 * ,
t#4=$q1q2 * ,
t#5=$q3 * ,
if $gender/2,t#6=$q3 * ,
bt='All females',
t#7=$q1q2_and_q3 * ,
t#8=$vnumber_in_household *,
+t#8x=@ $number_in_household *,
finish tables,
start manip,
di $my_integer=#1(r2,c0),
list $my_integer,
dw $my_percentage=#1(r2,c0) / #1(r0,c0) * 100.0,
list $my_percentage,
list csv 'Table 2 as figures',
list csv ' '.'Brand A'.'Brand B'.'Brand C'.'Brand D'.'Brand E'.'Brand F'.'Brand G'.'Brand H'.'Brand I'.'Brand J',
di $i1=#2(r1,c1),
di $i2=#2(r1,c2),
di $i3=#2(r1,c3),
di $i4=#2(r1,c4),
di $i5=#2(r1,c5),
di $i6=#2(r1,c6),
di $i7=#2(r1,c7),
di $i8=#2(r1,c8),
di $i9=#2(r1,c9),
di $i10=#2(r1,c10),
list csv 'Brand A'.$i1.$i2.$i3.$i4.$i5.$i6.$i7.$i8.$i9.$i10,
di $i1=#2(r2,c1),
di $i2=#2(r2,c2),
di $i3=#2(r2,c3),
di $i4=#2(r2,c4),
di $i5=#2(r2,c5),
di $i6=#2(r2,c6),
di $i7=#2(r2,c7),
di $i8=#2(r2,c8),
di $i9=#2(r2,c9),
di $i10=#2(r2,c10),
list csv 'Brand B'.$i1.$i2.$i3.$i4.$i5.$i6.$i7.$i8.$i9.$i10,
di $i1=#2(r3,c1),
di $i2=#2(r3,c2),
di $i3=#2(r3,c3),
di $i4=#2(r3,c4),
di $i5=#2(r3,c5),
di $i6=#2(r3,c6),
di $i7=#2(r3,c7),
di $i8=#2(r3,c8),
di $i9=#2(r3,c9),
di $i10=#2(r3,c10),
list csv 'Brand C'.$i1.$i2.$i3.$i4.$i5.$i6.$i7.$i8.$i9.$i10,
di $i1=#2(r4,c1),
di $i2=#2(r4,c2),
di $i3=#2(r4,c3),
di $i4=#2(r4,c4),
di $i5=#2(r4,c5),
di $i6=#2(r4,c6),
di $i7=#2(r4,c7),
di $i8=#2(r4,c8),
di $i9=#2(r4,c9),
di $i10=#2(r4,c10),
list csv 'Brand D'.$i1.$i2.$i3.$i4.$i5.$i6.$i7.$i8.$i9.$i10,
di $i1=#2(r5,c1),
di $i2=#2(r5,c2),
di $i3=#2(r5,c3),
di $i4=#2(r5,c4),
di $i5=#2(r5,c5),
di $i6=#2(r5,c6),
di $i7=#2(r5,c7),
di $i8=#2(r5,c8),
di $i9=#2(r5,c9),
di $i10=#2(r5,c10),
list csv 'Brand E'.$i1.$i2.$i3.$i4.$i5.$i6.$i7.$i8.$i9.$i10,
di $i1=#2(r6,c1),
di $i2=#2(r6,c2),
di $i3=#2(r6,c3),
di $i4=#2(r6,c4),
di $i5=#2(r6,c5),
di $i6=#2(r6,c6),
di $i7=#2(r6,c7),
di $i8=#2(r6,c8),
di $i9=#2(r6,c9),
di $i10=#2(r6,c10),
list csv 'Brand F'.$i1.$i2.$i3.$i4.$i5.$i6.$i7.$i8.$i9.$i10,
di $i1=#2(r7,c1),
di $i2=#2(r7,c2),
di $i3=#2(r7,c3),
di $i4=#2(r7,c4),
di $i5=#2(r7,c5),
di $i6=#2(r7,c6),
di $i7=#2(r7,c7),
di $i8=#2(r7,c8),
di $i9=#2(r7,c9),
di $i10=#2(r7,c10),
list csv 'Brand G'.$i1.$i2.$i3.$i4.$i5.$i6.$i7.$i8.$i9.$i10,
di $i1=#2(r8,c1),
di $i2=#2(r8,c2),
di $i3=#2(r8,c3),
di $i4=#2(r8,c4),
di $i5=#2(r8,c5),
di $i6=#2(r8,c6),
di $i7=#2(r8,c7),
di $i8=#2(r8,c8),
di $i9=#2(r8,c9),
di $i10=#2(r8,c10),
list csv 'Brand H'.$i1.$i2.$i3.$i4.$i5.$i6.$i7.$i8.$i9.$i10,
di $i1=#2(r9,c1),
di $i2=#2(r9,c2),
di $i3=#2(r9,c3),
di $i4=#2(r9,c4),
di $i5=#2(r9,c5),
di $i6=#2(r9,c6),
di $i7=#2(r9,c7),
di $i8=#2(r9,c8),
di $i9=#2(r9,c9),
di $i10=#2(r9,c10),
list csv 'Brand I'.$i1.$i2.$i3.$i4.$i5.$i6.$i7.$i8.$i9.$i10,
di $i1=#2(r10,c1),
di $i2=#2(r10,c2),
di $i3=#2(r10,c3),
di $i4=#2(r10,c4),
di $i5=#2(r10,c5),
di $i6=#2(r10,c6),
di $i7=#2(r10,c7),
di $i8=#2(r10,c8),
di $i9=#2(r10,c9),
di $i10=#2(r10,c10),
list csv 'Brand J'.$i1.$i2.$i3.$i4.$i5.$i6.$i7.$i8.$i9.$i10,
list csv 'Table 2 as percentages',
list csv ' '.'Brand A'.'Brand B'.'Brand C'.'Brand D'.'Brand E'.'Brand F'.'Brand G'.'Brand H'.'Brand I'.'Brand J',
di $i1=#2(r1,c1) / #2(r0,c1) * 100.0,
di $i2=#2(r1,c2) / #2(r0,c2) * 100.0,
di $i3=#2(r1,c3) / #2(r0,c3) * 100.0,
di $i4=#2(r1,c4) / #2(r0,c4) * 100.0,
di $i5=#2(r1,c5) / #2(r0,c5) * 100.0,
di $i6=#2(r1,c6) / #2(r0,c6) * 100.0,
di $i7=#2(r1,c7) / #2(r0,c7) * 100.0,
di $i8=#2(r1,c8) / #2(r0,c8) * 100.0,
di $i9=#2(r1,c9) / #2(r0,c9) * 100.0,
di $i10=#2(r1,c10) / #2(r0,c10) * 100.0,
list csv 'Brand A'.$i1.$i2.$i3.$i4.$i5.$i6.$i7.$i8.$i9.$i10,
di $i1=#2(r2,c1) / #2(r0,c1) * 100.0,
di $i2=#2(r2,c2) / #2(r0,c2) * 100.0,
di $i3=#2(r2,c3) / #2(r0,c3) * 100.0,
di $i4=#2(r2,c4) / #2(r0,c4) * 100.0,
di $i5=#2(r2,c5) / #2(r0,c5) * 100.0,
di $i6=#2(r2,c6) / #2(r0,c6) * 100.0,
di $i7=#2(r2,c7) / #2(r0,c7) * 100.0,
di $i8=#2(r2,c8) / #2(r0,c8) * 100.0,
di $i9=#2(r2,c9) / #2(r0,c9) * 100.0,
di $i10=#2(r2,c10) / #2(r0,c10) * 100.0,
list csv 'Brand B'.$i1.$i2.$i3.$i4.$i5.$i6.$i7.$i8.$i9.$i10,
di $i1=#2(r3,c1) / #2(r0,c1) * 100.0,
di $i2=#2(r3,c2) / #2(r0,c2) * 100.0,
di $i3=#2(r3,c3) / #2(r0,c3) * 100.0,
di $i4=#2(r3,c4) / #2(r0,c4) * 100.0,
di $i5=#2(r3,c5) / #2(r0,c5) * 100.0,
di $i6=#2(r3,c6) / #2(r0,c6) * 100.0,
di $i7=#2(r3,c7) / #2(r0,c7) * 100.0,
di $i8=#2(r3,c8) / #2(r0,c8) * 100.0,
di $i9=#2(r3,c9) / #2(r0,c9) * 100.0,
di $i10=#2(r3,c10) / #2(r0,c10) * 100.0,
list csv 'Brand C'.$i1.$i2.$i3.$i4.$i5.$i6.$i7.$i8.$i9.$i10,
di $i1=#2(r4,c1) / #2(r0,c1) * 100.0,
di $i2=#2(r4,c2) / #2(r0,c2) * 100.0,
di $i3=#2(r4,c3) / #2(r0,c3) * 100.0,
di $i4=#2(r4,c4) / #2(r0,c4) * 100.0,
di $i5=#2(r4,c5) / #2(r0,c5) * 100.0,
di $i6=#2(r4,c6) / #2(r0,c6) * 100.0,
di $i7=#2(r4,c7) / #2(r0,c7) * 100.0,
di $i8=#2(r4,c8) / #2(r0,c8) * 100.0,
di $i9=#2(r4,c9) / #2(r0,c9) * 100.0,
di $i10=#2(r4,c10) / #2(r0,c10) * 100.0,
list csv 'Brand D'.$i1.$i2.$i3.$i4.$i5.$i6.$i7.$i8.$i9.$i10,
di $i1=#2(r5,c1) / #2(r0,c1) * 100.0,
di $i2=#2(r5,c2) / #2(r0,c2) * 100.0,
di $i3=#2(r5,c3) / #2(r0,c3) * 100.0,
di $i4=#2(r5,c4) / #2(r0,c4) * 100.0,
di $i5=#2(r5,c5) / #2(r0,c5) * 100.0,
di $i6=#2(r5,c6) / #2(r0,c6) * 100.0,
di $i7=#2(r5,c7) / #2(r0,c7) * 100.0,
di $i8=#2(r5,c8) / #2(r0,c8) * 100.0,
di $i9=#2(r5,c9) / #2(r0,c9) * 100.0,
di $i10=#2(r5,c10) / #2(r0,c10) * 100.0,
list csv 'Brand E'.$i1.$i2.$i3.$i4.$i5.$i6.$i7.$i8.$i9.$i10,
di $i1=#2(r6,c1) / #2(r0,c1) * 100.0,
di $i2=#2(r6,c2) / #2(r0,c2) * 100.0,
di $i3=#2(r6,c3) / #2(r0,c3) * 100.0,
di $i4=#2(r6,c4) / #2(r0,c4) * 100.0,
di $i5=#2(r6,c5) / #2(r0,c5) * 100.0,
di $i6=#2(r6,c6) / #2(r0,c6) * 100.0,
di $i7=#2(r6,c7) / #2(r0,c7) * 100.0,
di $i8=#2(r6,c8) / #2(r0,c8) * 100.0,
di $i9=#2(r6,c9) / #2(r0,c9) * 100.0,
di $i10=#2(r6,c10) / #2(r0,c10) * 100.0,
list csv 'Brand F'.$i1.$i2.$i3.$i4.$i5.$i6.$i7.$i8.$i9.$i10,
di $i1=#2(r7,c1) / #2(r0,c1) * 100.0,
di $i2=#2(r7,c2) / #2(r0,c2) * 100.0,
di $i3=#2(r7,c3) / #2(r0,c3) * 100.0,
di $i4=#2(r7,c4) / #2(r0,c4) * 100.0,
di $i5=#2(r7,c5) / #2(r0,c5) * 100.0,
di $i6=#2(r7,c6) / #2(r0,c6) * 100.0,
di $i7=#2(r7,c7) / #2(r0,c7) * 100.0,
di $i8=#2(r7,c8) / #2(r0,c8) * 100.0,
di $i9=#2(r7,c9) / #2(r0,c9) * 100.0,
di $i10=#2(r7,c10) / #2(r0,c10) * 100.0,
list csv 'Brand G'.$i1.$i2.$i3.$i4.$i5.$i6.$i7.$i8.$i9.$i10,
di $i1=#2(r8,c1) / #2(r0,c1) * 100.0,
di $i2=#2(r8,c2) / #2(r0,c2) * 100.0,
di $i3=#2(r8,c3) / #2(r0,c3) * 100.0,
di $i4=#2(r8,c4) / #2(r0,c4) * 100.0,
di $i5=#2(r8,c5) / #2(r0,c5) * 100.0,
di $i6=#2(r8,c6) / #2(r0,c6) * 100.0,
di $i7=#2(r8,c7) / #2(r0,c7) * 100.0,
di $i8=#2(r8,c8) / #2(r0,c8) * 100.0,
di $i9=#2(r8,c9) / #2(r0,c9) * 100.0,
di $i10=#2(r8,c10) / #2(r0,c10) * 100.0,
list csv 'Brand H'.$i1.$i2.$i3.$i4.$i5.$i6.$i7.$i8.$i9.$i10,
di $i1=#2(r9,c1) / #2(r0,c1) * 100.0,
di $i2=#2(r9,c2) / #2(r0,c2) * 100.0,
di $i3=#2(r9,c3) / #2(r0,c3) * 100.0,
di $i4=#2(r9,c4) / #2(r0,c4) * 100.0,
di $i5=#2(r9,c5) / #2(r0,c5) * 100.0,
di $i6=#2(r9,c6) / #2(r0,c6) * 100.0,
di $i7=#2(r9,c7) / #2(r0,c7) * 100.0,
di $i8=#2(r9,c8) / #2(r0,c8) * 100.0,
di $i9=#2(r9,c9) / #2(r0,c9) * 100.0,
di $i10=#2(r9,c10) / #2(r0,c10) * 100.0,
list csv 'Brand I'.$i1.$i2.$i3.$i4.$i5.$i6.$i7.$i8.$i9.$i10,
di $i1=#2(r10,c1) / #2(r0,c1) * 100.0,
di $i2=#2(r10,c2) / #2(r0,c2) * 100.0,
di $i3=#2(r10,c3) / #2(r0,c3) * 100.0,
di $i4=#2(r10,c4) / #2(r0,c4) * 100.0,
di $i5=#2(r10,c5) / #2(r0,c5) * 100.0,
di $i6=#2(r10,c6) / #2(r0,c6) * 100.0,
di $i7=#2(r10,c7) / #2(r0,c7) * 100.0,
di $i8=#2(r10,c8) / #2(r0,c8) * 100.0,
di $i9=#2(r10,c9) / #2(r0,c9) * 100.0,
di $i10=#2(r10,c10) / #2(r0,c10) * 100.0,
list csv 'Brand J'.$i1.$i2.$i3.$i4.$i5.$i6.$i7.$i8.$i9.$i10,
finish manip,
